home *** CD-ROM | disk | FTP | other *** search
- object FamilyInput: TFamilyInput
- Left = 200
- Top = 99
- Width = 358
- Height = 234
- Caption = 'Family Information'
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- OnActivate = FormActivate
- TextHeight = 16
- object Title: TLabel
- Left = 16
- Top = 16
- Width = 313
- Height = 24
- AutoSize = False
- Caption = 'Title'
- Font.Color = clBlue
- Font.Height = -21
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 72
- Top = 56
- Width = 63
- Height = 25
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Name:'
- Font.Color = clBlue
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 24
- Top = 88
- Width = 111
- Height = 25
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Place of Birth:'
- Font.Color = clBlue
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 24
- Top = 120
- Width = 111
- Height = 25
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Date of Birth:'
- Font.Color = clBlue
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Name: TEdit
- Left = 144
- Top = 48
- Width = 161
- Height = 24
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object Pob: TEdit
- Left = 144
- Top = 80
- Width = 161
- Height = 24
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object Dob: TMaskEdit
- Left = 144
- Top = 112
- Width = 73
- Height = 24
- EditMask = '!99-99-00;1;_'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- MaxLength = 8
- ParentFont = False
- TabOrder = 2
- Text = ' - - '
- end
- object OKBtn: TBitBtn
- Left = 144
- Top = 160
- Width = 93
- Height = 31
- Caption = 'Ok'
- Default = True
- Font.Color = clGreen
- Font.Height = -19
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ModalResult = 1
- ParentFont = False
- TabOrder = 3
- OnClick = OKBtnClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 04000000000080000000CE0E0000D80E00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555205555555555555222055555555555522205555
- 5555555222220555555555222222055555555722052220555555720555522055
- 5555555555522205555555555555220555555555555552205555555555555572
- 0555555555555557205555555555555552205555555555555555}
- Margin = 8
- Spacing = -1
- end
- object CancelBtn: TBitBtn
- Left = 248
- Top = 160
- Width = 93
- Height = 31
- Font.Color = clRed
- Font.Height = -19
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- OnClick = CancelBtnClick
- Kind = bkCancel
- Margin = 2
- Spacing = -1
- end
- object HelpBtn: TBitBtn
- Left = 16
- Top = 160
- Width = 25
- Height = 31
- Caption = ' '
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 5
- OnClick = HelpBtnClick
- Kind = bkHelp
- Margin = 2
- Spacing = -1
- end
- end
-